home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Auge 4000 / Auge 4000 #54 (1991-04-07)(Amiga User Gruppe Einzugsgebiet 4000).zip / Auge 4000 #54 (1991-04-07)(Amiga User Gruppe Einzugsgebiet 4000).adf / PopUpMenu / Source / PopUpMenu.i < prev    next >
Text File  |  1991-04-07  |  5KB  |  211 lines
  1.  
  2.            STRUCTURE  WindowData,0
  3.            BOOL      wwd_BitMapOk
  4.            BOOL      wwd_ItemsEnabled
  5.            WORD      wwd_LeftEdge
  6.            WORD      wwd_TopEdge
  7.            WORD      wwd_RightEdge
  8.            WORD      wwd_Bottom
  9.            WORD      wwd_Width
  10.            WORD      wwd_Height
  11.            WORD      wwd_TopValue
  12.            WORD      wwd_LeftValue
  13.            APTR      wwd_Items
  14.            STRUCT      wwd_Bm,40
  15.            LABEL      wwd_SIZEOF
  16.  
  17.            STRUCTURE  WindowSize,0
  18.            WORD      ws_Left
  19.            WORD      ws_Top
  20.            WORD      ws_Right
  21.            WORD      ws_Bottom
  22.            LABEL      ws_SIZEOF
  23.  
  24.            STRUCTURE  SignalData,0
  25.            APTR      sd_PopUpMenuTask
  26.            ULONG      sd_MenuUpSig
  27.            ULONG      sd_MenuDownSig
  28.            ULONG      sd_MouseMovedSig
  29.            ULONG      sd_SelectDownSig
  30.            BOOL      sd_Down
  31.            LABEL      sd_SIZEOF
  32.  
  33.            STRUCTURE  MenuSort,0
  34.            APTR      ms_Next
  35.            APTR      ms_MenuPtr
  36.            LABEL      ms_SIZEOF
  37.  
  38. AbsExecBase          EQU   4
  39. TRUE              EQU   1
  40. FALSE              EQU   0
  41. * Exec
  42. _LVOObtainSemaphore   EQU  -$234
  43. _LVOReleaseSemaphore  EQU  -$23a
  44. _LVOForbid          EQU  -$84
  45. _LVOPermit          EQU  -$8a
  46. _LVOSetSignal          EQU  -$132
  47. _LVOCheckIO          EQU  -$1d4
  48. _LVOWaitIO          EQU  -$1da
  49. _LVOSendIO          EQU  -$1ce
  50. _LVODoIO          EQU  -$1c8
  51. _LVOGetMsg          EQU  -$174
  52. _LVOWait          EQU  -$13e
  53. _LVOSignal          EQU  -$144
  54.  
  55. * Layer
  56. _LVOLockLayers          EQU  -$6c
  57. _LVOUnlockLayers      EQU  -$72
  58.  
  59. * Intuition
  60. _LVOItemAddress       EQU  -$90
  61. _LVOLockIBase          EQU  -$19e
  62. _LVOUnlockIBase       EQU  -$1a4
  63. _LVOCurrentTime       EQU  -$54
  64. _LVOActivateWindow    EQU  -$1c2
  65. _LVOIntuiTextLength   EQU  -$14a
  66. _LVOPrintIText          EQU  -$d8
  67. _LVODrawImage          EQU  -$72
  68. _LVOAllocRemember     EQU  -$18c
  69. _LVOFreeRemember      EQU  -$198
  70.  
  71. * Graphics
  72. _LVOInitRastPort      EQU  -$c6
  73. _LVOSetFont          EQU  -$42
  74. _LVOTextLength          EQU  -$36
  75. _LVOSetDrMd          EQU  -$162
  76. _LVOSetAPen          EQU  -$156
  77. _LVORectFill          EQU  -$132
  78. _LVOInitBitMap          EQU  -$186
  79. _LVOAllocRaster       EQU  -$1ec
  80. _LVOFreeRaster          EQU  -$1f2
  81. _LVOBltBitMap          EQU  -$1e
  82. _LVOMove          EQU  -$f0
  83. _LVODraw          EQU  -$f6
  84. _LVOText          EQU  -$3c
  85.  
  86. sc_LayerInfo          EQU   $00E0
  87. sc_MouseX          EQU   $0012
  88. sc_MouseY          EQU   $0010
  89. sc_ViewPort          EQU   $002C
  90. sc_RastPort          EQU   $002C+$0028
  91. sc_FirstWindow          EQU   $0004
  92. sc_BitMap          EQU   $00B8
  93. sc_Height          EQU   $000E
  94. sc_Width          EQU   $000C
  95. sc_BarHeight          EQU   $001E
  96.  
  97. vp_Modes          EQU   $0020
  98.  
  99. wd_MenuStrip          EQU   $001C
  100. wd_DetailPen          EQU   $0062
  101. wd_BlockPen          EQU   $0063
  102. wd_CheckMark          EQU   $0064
  103. wd_ReqCount          EQU   $002C
  104. wd_Flags          EQU   $0018
  105.  
  106. rp_Font           EQU   $0034
  107. rp_BitMap          EQU   $0004
  108. rp_TxHeight          EQU   $003A
  109. rp_AOlPen          EQU   $001B
  110. rp_Flags          EQU   $0020
  111. rp_TxWidth          EQU   $003C
  112. rp_AreaPtrn          EQU   $0008
  113. rp_AreaPtSz          EQU   $001D
  114.  
  115. TR_ADDREQUEST          EQU   $0009
  116. IO_COMMAND          EQU   $001C
  117. IOTV_TIME          EQU   $0020
  118. TV_SECS           EQU   $0000
  119. TV_MICRO          EQU   $0004
  120.  
  121. ib_FirstScreen          EQU   $003C
  122. ib_ActiveScreen       EQU   $0038
  123. ib_ActiveWindow       EQU   $0034
  124.  
  125. mi_NextSelect          EQU   $0020
  126. mi_TopEdge          EQU   $0006
  127. mi_Height          EQU   $000A
  128. mi_LeftEdge          EQU   $0004
  129. mi_Width          EQU   $0008
  130. mi_ItemFill          EQU   $0012
  131. mi_SelectFill          EQU   $0016
  132. mi_Flags          EQU   $000C
  133. mi_SubItem          EQU   $001C
  134. mi_Command          EQU   $001A
  135. mi_MutualExclude      EQU   $000E
  136.  
  137. mu_NextMenu          EQU   $0000
  138. mu_LeftEdge          EQU   $0004
  139. mu_Width          EQU   $0008
  140. mu_Flags          EQU   $000C
  141. mu_MenuName          EQU   $000E
  142. mu_FirstItem          EQU   $0012
  143.  
  144. bm_Depth          EQU   $0005
  145. bm_Planes          EQU   $0008
  146.  
  147. it_LeftEdge          EQU   $0004
  148. it_TopEdge          EQU   $0006
  149. it_ITextFont          EQU   $0008
  150. it_IText          EQU   $000C
  151. it_NextText          EQU   $0010
  152.  
  153. ig_TopEdge          EQU   $0002
  154. ig_Width          EQU   $0004
  155. ig_Height          EQU   $0006
  156. ig_NextImage          EQU   $0010
  157. ig_SIZEOF          EQU   $0014
  158.  
  159. ta_YSize          EQU   $0004
  160.  
  161. IECLASS_MENULIST      EQU   $000A
  162. IECLASS_RAWMOUSE      EQU   $0002
  163.  
  164. MENUDOWN          EQU   $0069
  165. MENUUP              EQU   $00E9
  166. SELECTDOWN          EQU   $0068
  167. SELECTUP          EQU   $00E8
  168.  
  169. IEQUALIFIER_LSHIFT    EQU   $0001
  170. IEQUALIFIER_RSHIFT    EQU   $0002
  171. IEQUALIFIER_CONTROL   EQU   $0008
  172. IEQUALIFIER_LALT      EQU   $0010
  173. IEQUALIFIER_RALT      EQU   $0020
  174. IEQUALIFIER_LCOMMAND  EQU   $0040
  175. IEQUALIFIER_RCOMMAND  EQU   $0080
  176. IEQUALIFIER_MIDBUTTON EQU   $1000
  177. IEQUALIFIER_LEFTBUTTON      EQU    $4000
  178.  
  179. ie_Class          EQU   $0004
  180. ie_Code           EQU   $0006
  181. ie_Qualifier          EQU   $0008
  182. ie_EventAddress       EQU   $000A
  183. ie_TimeStamp          EQU   $000E
  184. ie_SIZEOF          EQU   $16
  185.  
  186. IND_WRITEEVENT          EQU   $000B
  187.  
  188. IO_FLAGS          EQU   $001E
  189. IO_LENGTH          EQU   $0024
  190. IO_DATA           EQU   $0028
  191.  
  192. NOITEM              EQU   $003F
  193. RP_JAM1           EQU   $0000
  194. RP_COMPLEMENT          EQU   $0002
  195.  
  196. ABNC              EQU   $40
  197. ANBC              EQU   $20
  198.  
  199. HIGHFLAGS          EQU   $00C0
  200. HIGHBOX           EQU   $0080
  201. HIGHCOMP          EQU   $0040
  202. ITEMTEXT          EQU   $0002
  203.  
  204. CHECKIT           EQU   $0001
  205. CHECKED           EQU   $0100
  206. COMMSEQ           EQU   $0004
  207. ITEMENABLED          EQU   $0010
  208. MENUTOGGLE          EQU   $0008
  209. MENUENABLED          EQU   $0001
  210.  
  211.